cyber.net interactivo 3/inter@ivo 1996-04.iso/cybint3/bin/patins.dxr/00044.ls

Text File | 1996-03-21 | 819 b | 43 lines

on enterFrame
  global Gflag
  set Gflag to 0
end

on mouseUp
  if rollOver(1) then
    go("d")
  end if
end

on exitFrame
  if rollOver(25) then
    if the visible of sprite 25 = 0 then
      set the visible of sprite 25 to 1
    end if
  else
    set the visible of sprite 25 to 0
  end if
  if rollOver(26) then
    if the visible of sprite 26 = 0 then
      set the visible of sprite 26 to 1
    end if
  else
    set the visible of sprite 26 to 0
  end if
  if rollOver(27) then
    if the visible of sprite 27 = 0 then
      set the visible of sprite 27 to 1
    end if
  else
    set the visible of sprite 27 to 0
  end if
  if rollOver(28) then
    if the visible of sprite 28 = 0 then
      set the visible of sprite 28 to 1
    end if
  else
    set the visible of sprite 28 to 0
  end if
  go(the frame)
end